System Courier `D|D|M euRfDzpIJ Courier `D|D|M Courier `D|D|M c"Text" c"Help" "&Author" c"File" c"Edit" "Import" "Export" "Change Printer..." "Open" "Save As..." "About Toolbook..." B"OK" enterBook About enterBook &Author Import Export Change Printer... Save As... About Toolbook... About About Diver's Log Book c"Text" c"Help" "&Author" c"File" "A&bout,,," c"Edit" "Import" "Export" "Change Printer..." "Open" "Save As..." "About Toolbook..." B"OK" enterBook About enterBook &Author A&bout,,, Import Export Change Printer... Save As... About Toolbook... About About Diver's Log Book System Courier `D|D|M RfDzpIJ Courier `D|D|M Courier `D|D|M Courier `D|D| `D|D| "Change Printer..." "Open" "Save As..." "About Toolbook..." B"OK" enterBook About enterBook &Author Import Export Change Printer... Save As... About Toolbook... About About Diver's Log Book "bbox" sizetoPage c"Text" c"Help" "A&bout Diver's Log Book,,," c"File" "Import" "Export" "Change Printer..." "Open" "Save As..." "About Toolbook..." "History" "Back" y Report..." AboutDiversLogBook "about" enterBook AboutDiversLogBook enterBook sizetoPage A&bout Diver's Log Book,,, Import Export Change Printer... Save As... About Toolbook... History Print Report... AboutDiversLogBook about `D|D| Gainesville, FL 32608 Ask with donation, and I will send you the Author password. Thanks A&bout Diver's Log Book,,, Import Export Change Printer... Save As... About Toolbook... History Print Report... AboutDiversLogBook Diver's Log Book, Version 2.2 By Dane Basch, HeadFirst Software. Remember: WETTER IS BETTER euRfDzpIJ X"sound.drv" CloseSound( ) CountVoiceNotes( GetThresholdStatus( ) OpenSound( ) SetSoundNoise( SetVoiceAccent( SetVoiceEnvelope( SetVoiceNote( SetVoiceQueueSize( SetVoiceSound( SetVoiceThreshold( StartSound( ) StopSound( ) SyncAllVoices( ) WaitSoundState( vTemp opensound() PLAY pitch,duration setVoiceNote(1,ABS(80- startSound() PLAYSTRING num setVoiceQueueSize(1,500) vtemp setVoiceSound (1,5632,1000) setvoiceaccent(1,160,250,1,0) (1,i*(80/ ),16,0) (1,i*(80/ ),16,0) CHROMESLIDE , fstart,dur, direction INITSOUND 1000 endnum (1,i, "down" (1,i, "warble" (1,j+ (1,j+ STARTSOUND TWILITEZONE queue 32,1000) 0,250,1,0) ACCELSLIDE type--,-- ,rate vstep j/80) delta * .19 's a guess, but don't change `* i, (dur+ _)),0) "note" > 40 * .275 > 40 * .275 deldur * .19 F)),0) SHARK ct vDiff Y(2^i)) (1,5,4+ (1,6,8+2* (1,0,8+2* default ROMESLIDE TWILITEZONE enterPage INITSOUND PLAYSTRING STARTSOUND ACCELSLIDE CHROMESLIDE SHARK enterPage sound.drv CloseSound CountVoiceNotes GetThresholdStatus OpenSound SetSoundNoise SetVoiceAccent SetVoiceEnvelope SetVoiceNote SetVoiceQueueSize SetVoiceSound SetVoiceThreshold StartSound StopSound SyncAllVoices WaitSoundState opensound vTemp setVoiceNote startSound duration pitch PLAYSTRING setVoiceQueueSize vtemp setVoiceSound vtemp setvoiceaccent vtemp setVoiceNote vtemp setVoiceNote vtemp startSound vTemp CHROMESLIDE INITSOUND setVoiceNote setVoiceNote warble setVoiceNote setVoiceNote STARTSOUND j:by2 j:to2 i:by1 vtemp i:to1 endnum direction fstart TWILITEZONE INITSOUND setVoiceNote setVoiceNote setVoiceNote setVoiceNote STARTSOUND vtemp fstart INITSOUND setVoiceQueueSize vtemp setVoiceSound vtemp setvoiceaccent vTemp queue STARTSOUND startSound vTemp ACCELSLIDE INITSOUND setVoiceNote setVoiceNote setVoiceNote STARTSOUND deldur vTemp i:to1 delta vstep direction fstart SHARK INITSOUND setVoiceNote setVoiceNote setVoiceNote STARTSOUND default vTemp vDiff A6BDC J$[t^ Send Next buttonUp buttonUp Let's Begin About &C~B#C Diver's Log Book, Version 1.11 By Dane Basch, NAUI Diver CIS # 72027,3036 Remember: Wetter is better!! B"OK" "About" buttonUp buttonUp About shark shark 60 914, 1400, 1424, 1720 914, 1400, 1484, 1765 914, 1400, 1544, 1885 914, 1400, 1619, 1990 914, 1400, 1889, 2110 914, 1400, 2144, 2320 914, 1400, 2429, 2410 914, 1400, 2714, 2590 914, 1400, 3284, 2815 914, 1400, 3734, 2995 914, 1400, 4214, 3205 914, 1400, 5054, 3640 914, 1400, 5654, 3895 914, 1400, 6434, 4135 914, 1400, 7109, 4585 914, 1400, 8144, 5335 914, 1400, 9014, 5725 914, 1400, 10014, 6225 914, 1400, 11014, 6725 914, 1400, 12014, 7225 914, 1400, 13014, 7725 914, 1400, 14014, 8225 914, 1400, 15014, 8725 H1000, 0 914,1400,1409,1705 stopsound() buttonUp buttonUp shark stopsound This Toolbook application is SHAREWARE. You are encouraged to evaluate this program. If you find it useful, please register your copy by paying nominal fee of $10. Thank you. Registrations, comments, and suggestions can be sent to: Dane Basch (Headfirst Software) 2811 SW Archer RD Apt. K-99 Gainesville, FL 32608 CIS #: 72027,3036 America On Line: DaneBasch Sending in your fee will entitle you to receive a copy of this program without this "Beggar's Box."app Continuation "bbox" buttonUp buttonUp Continue about r`*`o` SCUBA Diver's Log Book, Version 2.20 A better way to record the dives you make. Certainly the prettiest way. REMEMBER, WETTER IS BETTER! By Dane Basch, NAUI Diver. "About" buttonUp buttonUp About buttonUp shark stopsound Send Background NewPage buttonUp buttonUp Background y5NewPage New Page "T ,b^aR AboutDiversLogBook "about" AboutDiversLogBook AboutDiversLogBook about Date of the Dive:Dive:: Destination for the Dive: Description of Dive Activity::::: Maximum Depth of Dive: Total Bottom Time of Dive: Button Minutes d,<,a, about ~262{2 SCUBA Diver's Log Book, Version 2.20 A better way to record the dives you make. Certainly the prettiest way. REMEMBER, WETTER IS BETTER! By Dane Basch, NAUI Diver. "About" buttonUp buttonUp About NITSOUND 1000 endnum (1,i, "down" (1,i, "warble" (1,j+ (1,j+ STARTSOUND TWILITEZONE queue 32,1000) 0,250,1,0) ACCELSLIDE type--,-- ,rate vstep j/80) delta * .19 's a guess, but don't change `* i, (dur+ _)),0) "note" > 40 * .275 > 40 * .275 deldur * .19 F)),0) SHARK ct vDiff Y(2^i)) (1,5,4+ (1,6,8+2* (1,0,8+2* default P4QBR h t Send Next buttonUp buttonUp Begin About $R|Q!R Diver's Log Book, Version 1.11 By Dane Basch, NAUI Diver CIS # 72027,3036 Remember: Wetter is better!! B"OK" "About" buttonUp buttonUp About shark 914, 1400, 1424, 1720 914, 1400, 1484, 1765 914, 1400, 1544, 1885 914, 1400, 1619, 1990 914, 1400, 1889, 2110 914, 1400, 2144, 2320 914, 1400, 2429, 2410 914, 1400, 2714, 2590 914, 1400, 3284, 2815 914, 1400, 3734, 2995 914, 1400, 4214, 3205 914, 1400, 5054, 3640 914, 1400, 5654, 3895 914, 1400, 6434, 4135 914, 1400, 7109, 4585 914, 1400, 8144, 5335 914, 1400, 9014, 5725 914, 1400, 10014, 6225 914, 1400, 11014, 6725 914, 1400, 12014, 7225 914, 1400, 13014, 7725 914, 1400, 14014, 8225 914, 1400, 15014, 8725 H1000, 0 914,1400,1409,1705 stopsound() buttonUp buttonUp stopsound SoundEngine --This the "Sound Engine", other that generates --sound INITIALIZESOUND !.drv" CloseSound( ) CountVoiceNotes( GetThresholdStatus( ) OpenSound( ) SetSoundNoise( SetVoiceAccent( SetVoiceEnvelope( SetVoiceNote( SetVoiceQueueSize( SetVoiceSound( SetVoiceThreshold( StartSound( ) StopSound( ) SyncAllVoices( ) WaitSoundState( vTemp opensound() PLAY pitch,duration setVoiceNote(1,ABS(80- startSound() PLAYSTRING num setVoiceQueueSize(1,500) vtemp setVoiceSound (1,5632,1000) setvoiceaccent(1,160,250,1,0) (1,i*(80/ ),16,0) (1,i*(80/ ),16,0) CHROMESLIDE , fstart,dur, direction INITSOUND 1000 endnum (1,i, "down" (1,i, "warble" (1,j+ (1,j+ STARTSOUND TWILITEZONE queue 32,1000) 0,250,1,0) ACCELSLIDE type--,-- vstep i/80) delta * .19 's a guess, but don't change `* i, (dur+ _)),0) "note" > 40 * .275 > 40 * .275 deldur * .19 F)),0) SHARK ct vDiff Y(2^i)) (1,5,4+ (1,6,8+2* (1,0,8+2* default BUTTONUP LIZESOUND CHROMESLIDE TWILITEZONE INITSOUND STARTSOUND PLAYSTRING ACCELSLIDE SHARK INITIALIZESOUND BUTTONUP INITIALIZESOUND sound.drv CloseSound CountVoiceNotes GetThresholdStatus OpenSound SetSoundNoise SetVoiceAccent SetVoiceEnvelope SetVoiceNote SetVoiceQueueSize SetVoiceSound SetVoiceThreshold StartSound StopSound SyncAllVoices WaitSoundState opensound vTemp setVoiceNote startSound duration pitch PLAYSTRING setVoiceQueueSize vtemp setVoiceSound vtemp setvoiceaccent vtemp setVoiceNote vtemp setVoiceNote vtemp startSound vTemp CHROMESLIDE INITSOUND setVoiceNote setVoiceNote warble setVoiceNote setVoiceNote STARTSOUND j:by2 j:to2 i:by1 vtemp i:to1 endnum direction fstart TWILITEZONE INITSOUND setVoiceNote setVoiceNote setVoiceNote setVoiceNote STARTSOUND vtemp fstart INITSOUND setVoiceQueueSize vtemp setVoiceSound vtemp setvoiceaccent vTemp queue STARTSOUND startSound vTemp ACCELSLIDE INITSOUND setVoiceNote setVoiceNote setVoiceNote STARTSOUND deldur vTemp i:to1 delta vstep direction fstart SHARK INITSOUND setVoiceNote setVoiceNote setVoiceNote STARTSOUND default vTemp vDiff BUTTONUP Sound Engine